perm filename APAR.DCL[PIC,HE] blob
sn#421676 filedate 1979-02-24 generic text, type C, neo UTF8
COMMENT ā VALID 00002 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00002 00002 external simple procedure apareset
C00006 ENDMK
Cā;
external simple procedure apareset;
external simple procedure apardopen;
external simple procedure aparopen;
external simple procedure aparin(integer val);
external simple procedure aparout;
external procedure apardisplay;
external simple procedure aparclose;
external simple procedure waparhdr;
external procedure apartty(integer val);
external simple procedure listpairs;
external procedure testraighter(integer id1, id2);
external simple procedure setaparsize(integer rows, columns);
external simple procedure seterrors(integer md, le, pe);
external simple procedure setmark(integer mark);
external simple procedure apartestinfo;
external procedure apareadcheck;
external simple procedure aparwopen;
external simple procedure edaphdr;
external simple procedure apmdaxes;
external simple procedure aparcomp(reference integer id1, id2);
external simple integer procedure getaparno;
external simple procedure aparget;
external simple boolean procedure apbright;
external simple procedure apdinit;
external simple procedure apdisplay;
external simple procedure apendisplay;
EXTERNAL SIMPLE PROCEDURE APARFREE;
external simple procedure apicsize(reference integer r, c);
external simple real procedure aparlen;
external simple real procedure aparpatch(integer id);
EXTERnal simple procedure getcoord(integer id;
reference integer r1, c1, r2, c2);
external simple procedure setss(integer ssid);
external simple procedure drawbeg(integer apid);
external simple procedure drawend(integer apid);
external simple procedure movebeg(integer apid);
external simple procedure aptofile(integer chan);
external procedure chtheta;
external simple boolean procedure bitsown;
external simple procedure toitsown;
external simple real procedure apitsown;
external simple procedure get1ap(reference integer r, c);
external simple procedure get2ap(reference integer r, c);
external simple procedure getbeg(integer apid; reference integer r, c);
external simple procedure getend(integer apid; reference integer r, c);